? (WHAT TS ON THE TABLE) 
(I CANT PARSE YOUR INPUT) 


i 
2 (WHAT TS NOT ON THE TABLE) 
(THE BLOCK) 


2CIS TIE BLACK BOX ON THE BLACK TABLE) 
(THERE IS NO BLACK BOX) 


?CES THE BLACK BOX ON THE FLOOR) 
(THERE IS NO BLACK BOX 


? (WHAT IS BLACK) 
(THE BLACK BALL AND THE BLACK TABLE) 


2BYE 
BYE 


MILISY, dans sa version de base accepte cing types de phrases. 
Phrases déclaratives : "sp" 
(A BLOCK LS NOT ON THE TABLE) 
Phrases existentielles : . "or" 
(THERE IS A BLUE BALL ON THE BLACK TABLE) 


Questions du type oui/non : "sq" 
(TS THE BLACK BOX ON THE TLOOR) 
Questions existentielles du type oui/non : "SEQ" 


(IS THERE TUE BLACK BOX ON THE TABLE) 
Questions du type quoi/quel : "sy" 


(WHAT IS ON THE TABLE) 


Cette grammaire initiale peut facilement être modifiée en changeant les règles 


existantes, ou en ajoutant de nouvelles régles. 


soso 
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Les régles de production utilisent une notation BNF (Backus Normal Form) 
modifiée : 

Un symbole nom-terminal est écrit entre crochets. 

Le % indique une classe de symboles terminaux. 

Entre deux symboles : le ! indique la disjonction 

en l'absence de ce signe la concaténation. 

Exemple : 

Watts Matt pte tty gon i war" poyn 

"ADI" :=%COLORIZS LEE 


= 


Une classe de svnboles terminaux se réécrit comme suit : 


BSLAL IS T SMALL, 


On passe de cette rotation A la représentation interne LISP suivante : 


Chaque symbole non terminal correspond 4 un atome LISP ; les règles de produc- 
tion sont des listes placées dans 1a p-liste de l'atome sous l'indicateur PRULE. 
Dans te cas où les régics de production définissent plusieurs réécritures pos- 
sibles, chaque réGeriiure constitue une sous-liste. Chaque classe de symboles 
terminaux correspond aussi à un atome LISP ; les éléments de la classe forment 


une liste placée dans la p-liste de l'atome sous l'indicateur SET. 


La figure 2 donne l'ensemble des régles de production. 


seal sis 
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CPRULE Cf OSS) Cenu) CS She) EESE? 


Hide < GTI 


CPRULE CE (Gebäi VPS) 99 


Hesse VPP 
CPRULE Cf (€e CEP» <PREDS235 


does < CMP oe 
t 


€PRULE C! 


t 


eR <P RIL 
ë Meet e D 
CPRULE CT CTHERE <CMP> «NP» &<PP223 12 


Reki < SAY 
» 
> 


CPRULE CF (ZBE <NP> <PRE> 2 32 


pss ST 
t CDR THERE <NP> <PP>) >) 


` des < SWH > 
CPRULE Cf CAVU vtGüpx: <FRED>33) 


tacite CH u> 
CPRULE Ç! (NØT? NII} 


MUR < PP > 


CPRULE C} CRPREP eNPr)553 
idee <] Pe 


€PRULE Cf CADET <NPEr))3 
: Zei ph < NY $ > 


CPRULE CI (<MØDI> ENOUN <HDD2>))) 


Säck <1 @D ES . 
CPRULE C! C<ADJ> <MG0GDl>23 NIL)) 


Ask < AD 


CPRULE Cf CRCOLOR) CESIZE)D) 


domi <M D> 


CPRULE CI (<SWH>Y RELI) 


Se ste ate obs ae 
wise ZBE 


. {SET CIS ARED) 


ok BDD ED 


CSET CIN ON UNDER NEAR} 


we SORT 


CSET CTHE A) 


wkk SST Z 
CSET CBIG SMALI Y 


fa sta le lenke Er E en 
Sege ech SCO GL Biz 


CSET CRED BLUE fy DGUACK) 3 


seats SA OLA 
CSET (DEOX BALI BLECH TABLE FL@GR23 
Asso SU 
CSET CVHICH WHAT? > 
MII I 
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LASER? J? 


. 


La première Grape après la lecture d'une phrase en est l'analyse syntaxique : 
la fonction PARSE remplace La phrase initiale par l'arbre correspondant à sa 
structure syntaxique. 

Exemple : 

Pour la phrase TS THERE A BOX ON THE FLOOR, l'arbre suivant est produit : 


<§> 
<5EQ> 
ZEE Lo 
TRERE 
SR? 
GINN A 
<NP I> 
<MOD1> NIL 
ZNOUN BOX | : Fi ig. 3 
<MOD2> NIL 
<PP> 


ZPREP ON 
<NP> 
ADET THE 
<NP1> 
<MODI> NIL 
ANOUN FLOOR 
<MOD2> NIL 


C'est cet arbre qui va servir d'entrée à l'étape suivante dite d'"interprétation" ` 


et que nous allons voir plus en détail, 


1° Base de données : 


Chaque phrase entrée compléte (ou fait appel à) la connaissance par le programme 
d'un certain univers. Cet univers est décrit de manières interne par un ensemble 
de faits (FACTS) constituant la base de données du programme. La liste des faits 


a 


correspondant ñ la conversation ! est la suivante : 


las 
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Fig: 4 
(ON G0005 G0002) A chaque nouvel objet introduit au cours 
(ZCOLOR GOQOS BLACK) de la conversation correspond un iden- 
(ISA GO005 BALL) tificateur : 
(%COLOR G0003 BLIN) GO001, G0002,... 
(NOT(ON G0004 GG002)) Un fait est généralement un triplet défi- 
(ISA G0004 BLOCK) uissant ou décrivant un objet 
(ON G0003 GO002) G0001 est une boite, G0001 est gros etc... 


(ISA C0003 BALL) 

(ON G0001 G0002) 
(ZCOLOR G0002 BLACK) 
(ISA G0002 TABLE) 
(ASTZE G0001 BIG) 
(LSA GO001 BOX) 


Chaque phrase après une interprétation, va être transformée en une action sur la 


base de données, 


o . 
2° Actions sur la base de données : 


Actuellement, 3 actions sont possibles sur la base de données. Elles se font par 


l'intermédiaire des 3 fonctions suivantes : 


D RECORD permet d'ajouter une information à la base de données. 

Par exemple, après une phrase du type (THE BALL IS BLUE), si 

HE BALL à comme identificateur interne G0003, la fonction RECORD 
ajoutera ä la base de données (ZCOLOR G0003 BLUE). 

permet de vérifier la présence d'une information dans la base de 
données. Aprés la phrase (IS THE BALL BLUE), la fonction VERIFY 
recherchera si l'on a (2COLOR G0003 BLUE) et répondra par OUI/NON. 


0 VERITY 


e 


E asa 
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O FIND permet de trouver s'ils existent, les objets ayant certaines 
propriétés. Par exemple, après la question (WHAT IS BLUE), la 
fonction FIND établira la liste des objets pouvant remplacer x 


duns (4COLOR x BLUE). 


3° Le mécauisme de l'interprétation. 


Tl va consister à substituer à la représentation sous forme d'arbre de la 
phrase un appel à l'une des 3 fonctions précédentes, avec les paramètres ` 
adéquats. Nous allons étudier ce mécanisme sur l'exemple de la phrase 

(IS THERE À BOX ON THE FLOOR) 
dont L'arbre syntaxique est donné Fig, 3. 
La phrase est do type "SEQ" ; elle aménera donc une réponse OUI/NON. Cette 
caractérisation du type de la phrase est remplacée par un appel de la fonc- 


tion VERIVY (Fig. 5). 


(APPLY 'I~SEQ) 


<S> 
VERIFY Fig, 5 
ss 
<NEG> NIL 


<NP > 
YDET A 
PIS ` 
<MOD1> NIL 
ZNOUN -BOX 
<MOD2> NIL 
<PRED> 
<pp> 


“PREP ON 
<NP> 
ADET TBE 
<NP]> 
“MOD I> NTL 
ANOUN FLOOR 
<MOD2> NIL, 
n eee 
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À chaque groupe nominal (NP), correspond à un ou plusieurs objets représentés 


dans la base de données sous la forme G000n. L'analyse du groupe nominal (NP) 


va consister à chercher dans la base de données quels sont les objets qui lui 


sont associés. La Fig. 6 montre la recherche de la représentation interne de 


L'objet associé à "A BOX". 


CAPPLY TeNP 12 


RT & 

SNP> 

' 107 

emg bi> NIL 
cMfDer NIL 


“NP 


ISA 
107 
f BGA 
CAPPLY TeMGD&d 
<P> 
42DET À 
«NP 
107 
<pig@pe> NIL 
LSA 
107 
` BEK 
CAPPLY T=MGD25 
<N P> 
ADET A 
<NE Le 
107 
ISA 
107 
BOX 
CAPPLY TeNP3 
Kito 
A 
107 
ISA 
107 
BON 


CAPPLY T#JNDEF? 


Fig. 6 


La fonction (T-INDEF) va associer a la variable 
107 un objet (ici G0005) en recherchant dans la 
base de données les faits de la forme 


(ZISA 107 BOX). 
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CÇCAPPLY TeN ETS 


<NP> 
SET ` JE 
<NPL>, Tig. 7 
I 106 
<an> NIL 
€MED2> NIL 
LSA 
108 
FL GT. 
€APPLY Teil 


po 
2DET TRE 
ch Pp i> 
10% 
aapa» NIL 
ISS 
108 
FLEUR 
CAPPLY Ten Gi 


< Np 
RDET ` THE 
el i> 
Hais 
In 
108 
FLOGT 
CAPPLY Tepp? 


<i> 
THE 
106 
ISA 
r03 
. DT, GER 
CAPPLY TeDEF) 


ma Pa rs 


— 


G0004]N 11 


Le groupe <PRED> est soit une caractérisation d'un objet (ADJ), soit, et c'est 


le cag de l'exemple, une relation entre deux objets (PP). 


Le dernier groupe interprété est celui de la négation (Fig. 8). 


wid ware 


http:/Awww.artinfo-musinfo.org Rapport de recherche en IA, 1974-1975, page 49 / 65 


| (APPLY "raf P) 


le Se ne Li Fig. 8 
VIEL EY ao 
SS 
«<NEG> NIL 
GN 
GO005 
60004 


CAPPLY TNN EM? 


< Sp 
VERT FY 
GN 
G0005 
GG6004 


La transformation finale de la phrase "IS THERE A BOX ON THE TABLE" est un appel 
de la fonction VERIFY avec comme argument (ON G0005 G0004). Après consultation 


de la base de données, la réponse sera OUI ou NON. 


MILISY est un programme simple et prétendant pas atteindre aux performances 
d'autres programmes dans le domaine (1). Certaines modifications (introduction 

de la possibilité de déduction) pourraient cependant lui permettre de travailler 
sur un univers complexe, 

Son intérêt principal est de montrer les problèmes de représentation d'un ensemble 
d'objets, de leurs caractéristiques, de leurs relations, par rapport à la compré- 
hension de phrases concernant cet ensemble d'objets. Il montre aussi les pos- 
sibilités offertes par le langage LISP en ce qui concerne la manipulation de 


telles descriptions. 
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Le système LISP CAB 502 est conçu pour l'enseignement du langage LISP aux 
débutants. L'emploi ne se fait qu'en mode conversationnel. 

A quelques exceptions près ce système coïncide avec le système LISP 510, ceci 
afin de ne pas dérouter le débutant en le confrontant à deux versions d'un 
même langage. 

Malgré sa lenteur et sa vulnérabilité 1} constitue un excellent outil pour 
l'étudiant, dù au fait que les CAB Sont les seuls ordinateurs à la libre 


disposition des débutants. 


L'interprète tourne en mode EVAL : il fit un atome ou un appel de fonction, 


l'évalue, imprime fe résultat de l'évaluation et recommence. 


On peut entrer des S-expressions sur ruban perforé ou sur Île clavier de la 
flexowriter connectée à la CAB. La flexo indique qu'elle attend une instruc- 


tion en tapant "?", La sortie se fait également sur ruban perforé. 


COURTE DESCRIPTION DE LA CAB 502/B 


Zë on =< meme nee men rm = ZS vm == mu =m. =Z m =. 


C'est un ordinateur de seconde génération (1960) avec une mémoire centrale 
de 32 K-mots de 32 bits sur un tambour magnétique. (temps d'accès au mot 


1/50 de seconde). 


` 


Entrées/Sorties par a) machine à écrire (émettrice-réceptrice) 
b) perforateur de ruban 


c) lecteur de ruban 
Une instruction est codée sur 32 bits 


Il y a 13 opérations élémentaires et 32 extra-codes ("microprogrammés") 


Adressage registre-mémoire, immédiat, direct ou indexé. 


——— etc A CT A OI CL 
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DEFINITIONS 


ATOME: ça peut être un nombre,éventuelement précédé du signe"-",et ça 
peut être un atome non numérique,c.a.d. toute suite de caractères, 
sauf séparateurs.A la lecture la machine ne prend en compte que les 


huit premiers caractères. 


SEPARATEUR: "espace" , "." , "(" , ")" .Toutefois on peut ,comme en 
LISP 510,constituer des atomes comprenant des séparateurs grace à la 


fonction READCH. 


NOMBRES: LISP CAB 502 ne connait que les nombres entiers inclus dans 
l'intervalle rengt Zi i 1] S 
Les atomes numériques ne comportent ni C ,ni P-valeurs et sont stockès 


Ki 


dans une zone spéciale à raison d'un nombre par mot CAB. 


A l'impression tous les objets édités seront précédés automatiquement 


d'un espace. 


Le nombre d'atomes définis par l'utilisateur ne pourra pas dépasser 


190,l'utilisateur dispose de 1860 doublets libres,et ne peut utiliser 


plus de 256 nombres. 


La faiblesse du système actuel est le manque d'un garbage collector. 
Cette lacune s'explique par le temps d'exécution extrémement lent de 
la CAB 502 (on peut compter environ IQ minutes pour garbager les 1860 
doublets).Mais il est prévu d'en écrire une fonction GC que l'utilisa- 


teur peut appeler à des endroits qui lui semblent opportuns. 


lt 
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Un atome non numerique est représenté en mémoire par une suite de 


h mots consécutifs; 


C-valeur 


I) La partie P-NAME contient les caractères qui représentent son nom 


externe, c.à.d, imprimable., 


2) La partie C-valeur contient à tout instant la valeur de l'atome, 
c'est le CAR de l'atome. Les C-valeurs des atomes définis par l'utili- 
sateur seront initialisées à la valeur"indéfini" ce qui provoquera à 
l'évaluation l'erreur A8, 

La C-valeur des SUBR contient l'adresse du code-machine correspondant. 
Les atomes-systèmes NIL, QUOTE, LAMBDA, EXPR, FEXPR, T, contiennent 


en C-valeur leur propre adresse. 


3) La partie P-valeur contiendra la P-liste de l'atome. 

Elle sera considéeée comme le CDR de l'atome. Les fonctionsDE et DF 

ne modifient pas la C-valeur des atomes,ce qui permet de redéfinir 
momentanément une fonction standard comme une EXPR, NEXPR,ou FEXPR. 

IL y a la possibilité à la lecture d'apppeler une fonction LISP à la 
seule occasion dlun caractère. Le résultat de l'appel de cette fonction 
sera substitué à la place du caractère lu. Le caractére"'" est une 


macro standard, Si on a l'option Conniver,on a en plus du macro"'" 


nan nyu tan fon "rm nan 
SS 5 / 2 A 5 ? 5 I D 


les macrox 


Un macro caractère particulier ne peut être défini qu'une seule fois. 


Les S-EXPRESSIONs pointées sont acceptées par le système sous la 


forme la plus générale. 
A l'appel d'une fonction dont la variable est argument formel,la valeur 


eg 
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de cette variable est empilée dans la pile de travail et restituée à 


la sortie au moyen des fonctions BIND et UNBIND. 


CONFIGURATION DE LA MEMOIRE APRES CHARGEMENT DU SYSTEME. 


ie prèle ck IO 


H Aka hac 
| 


akom a Munn kuat, 


L 


Lu DEER (en aore À 
GR? Rg 


tewas Landtag 
q 


tale | 
À d 
ala bee 


pi du Laval 


4 

aen de vel c 
š 

W Lune CHB 


Cuniergpranam mu l te | 


i 
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Il y a 6 types de fonctions: SUBR , NSUBR , FSUBR , 
EXPR , NEXPR , FEXPR , 


Les SUBR sont des fonctions standard écrites en langage externe CAB" 
Les EXPR sont des fonctions définies en LISP par l'utilisateur. 


SUBR , EXPR : Les arguments en nombre fixé sont évalués puis passés 


` 


à la fonction. 


NSUBR , REXPR : Les arguments en nombre quelconque sont évalués.Puis 


les valeurs sont rassemblées en une liste qui est passée à la fonction. 
I : 


4 
d 


FSUBR , FEXPR : Les arguments en nombre quelconque sont rassemblés 


en une liste qui est passée telle quelle à la fonction. 


Si une fonction n'a pas assez d'arguments à l'appel, les arguments 
manquant sont supposés être NIL, Si l'appel de fonction comporte trop 


d'erguments(pour les EXPR , SUBR) ils sont évalués mais ignorés par 


la fonction. 


+ 


Les NSUBR sont les fonctions :LIST , PLUS , TIMES . ae 


En LISP CAB comme en LISP 510 ,VRAI est équivalent à non NIL. 


EE Z X X X X X X XU G Z O z 
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FONCTIONS DE CONTROLE 
Subr:EVAL APPLY EPROGN EVLIS 
Fsubr:PROGN AND OR WHILE COND QUOTE 


FONCTIONS D'ENTREE~SORTIE 
Subr:READ PRINT PRINI TERPRI SPACES READCH 
Fsubr: TAB 


(TAB) sans arguments,effectue une tabulations préréglée sur 


la flexo 


FONCTIONS DE DONNEES 

Subr:ATOM CAR CDR CAAR CADR CDAAR CDDR CADDA EQ NEQ NULL 
NOT CONS LENGTH NTH MEMQ SET NCONC NCONCI EQUAL NEQUAL 
MAP MAPC RPLACA RPLACD PUT GET LOGOR LOGAND DELETE 
REVERSE ASSOC CASSOC CDELETE MATCH PREPARE 

Fsubr:NEXTL SETQ 

Nsubr: LIST 


FONCTIONS ARITHMETIQUES 


Subr:ADDI SUBI DIFFER QUO REM NUMBP ZEROP LT GT EQ NEQ 
RACINE SS 
Nsubr:TIMES PLUS 


FONCTONS D'ENREGISTREMENT 
Fsubr:DE DF MACRO 


FONCTIONS DU SYSTEME 
Subr:RESET OBLIST SETBIT CLRBIT 
Fsubr: VARIANTE 


(uerge si le poussoir 'VARIANTE' est allumé 


NIL sinon 


om 
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Si vous voulez utiliser le LISP CAB 502, dévérouillez les premières 128 
pistes (interrupteur en posi tion haut), poussez le voyant "bureau" et 


ensuite sur "Départ", Ca imprime ":", taper alors un "L", le système 
complète "ISP", se réinitialise, et s'il n'y a pas de pépin Imprime 
"OK-LISP", sinon "KO-LISP" et imprime les pistes fausses. II faut alors 


recharger ta ou les pistes et tout recommencer. 


Après {'indication d'une erreur, la machine arrête le traitement en cours 
et se met en boucle lecture. 


En cas d'une erreur grave, où si un programme boucle, pousser la touche 
"Départ" du pupitre et recommencer comme ci-dessus. 


L'implantation d'un interprète LISP sur CAB 500 démontre à notre sens la 
here d'un point de vue que nous avons souvent soutenu au département : 


qu'il est tout à fait possible et même pédagogiquement pertinent d'envi- 
sager l'implantation de softs relativement CAIN sur des matériels 
anciens. 


L'intérêt pédagogique d'un tel couplage réside dans la disponibilité et 
l'accessibilité permises par de viellles machines en temps réel simples 
à manipuler. 


L'étudiant sent véritablement "tourner" l'interprète. Le débutant n'est 
pas "écrasé" de prime abord par une technologie dont l'efficacité déroute. 


D'autre part étant donné la place que nous réservons au matériel ancien 

dans l'initiation des débutants, il nous parait profitable d'investir 

sur celui-ci dès ce stade de manière à ce que les étudiants abordent 
intellectuel lement mieux armés les phases ultérieures de feu apprentissage. 


Une amétioration du système est en construction. Elle comportera entre 
autre l'inclusion des tableaux et des nombres réels ainsi qu'un Conniver, 
et en particulier un compilateur pour accélérer l'exécution des programmes. 


Nee 
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